      LOGICAL NEWLIN,WRICOM,IOEOFI,EOFERR
      CHARACTER*80 STRING,STRSAV,CRDSTR
      CHARACTER*1 COMMIO
      COMMON /ZZZIO1/ STRING,STRSAV,COMMIO
      COMMON /ZZZIO2/ NEWLIN,WRICOM,IOEOFI,EOFERR,IOZZIN,IOZZOU
